(Info-fontify-node): Highlight every third menu item.

diff --git a/lisp/info.el b/lisp/info.el
index 38c077a54178a846e122c44956a2dd4de472e2b8..8b8447a7b6b65422a886c170c2d51d04372e08a6 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2622,7 +2622,7 @@ the variable `Info-file-list-for-emacs'."
            (let ((n 0))
              (while (re-search-forward "^\\* +\\([^:\t\n]*\\):" nil t)
                (setq n (1+ n))
-               (if (memq n '(5 9))     ; visual aids to help with 1-9 keys
+               (if (zerop (% n 3)) ; visual aids to help with 1-9 keys
                    (put-text-property (match-beginning 0)
                                       (1+ (match-beginning 0))
                                       'face 'info-menu-5))